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This manual describes features provided by common-resident LIOCS 
(LIOCS-C) that augment the capabilities of partition-resident 
LIOCS described in the DMF Reference Manual. Functions not 
described in this manual operate in the manner specified in the 
DMF Reference Manual. 
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LIOCS-C 


differs from its partition-resident counterpart in 


capability, location, and user interface. The most significant 
additional capabilities ares 


1. 


A. 


Multi-sector records are supported. While the only 
limit on record length is the amount of core available 
for the I/0 area, any record that is to be accessed by 
RPG, or is to be sorted, should not exceed 940 data 
characters (10 sectors). 


Record contention, i.e., the attempt by two or more 
partitions to update the same record, can be prevented 
by utilizing two new operations as follows: 


_GETUP (_GET for update) 
and 
_READU (_READ for update) 


Disc arm movement caused by switching to another 
partition during a multi-sector I/0 operation, is 
prevented by “locking" the disc drive to the controlling 
partition until the operation is complete. This feature 
can reduce delays in multi-partition systems that are 
caused by extraneous arm movement. 


_READ now locates and retrieves the data record in an 
indexed-linked sequential file, that is, whether or not 
there is a one-for-one entry in the file index. 


LIOCS-C contains an overlay routine to fetch or load 
modules, by file name, that are stored in SYSPOL. 


A "system lock" is provided to prevent conflict between 
partitions that are simultaneously allocating free 
sectors to files in the same pool. 


The bulk of LIOCS-C code is located in common and is re-entrant, 


that is, 


exits 


it allows concurrent use by many partitions. LIOCS-C 


and switches, which are modified during execution, reside 


in locations 750-999 of each partition. 
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The user interface to LIOCS-C differs from partition LIOCS as 


follows: 


1. 


LIOCS-C is not assembled with user. programs. The 
programmer need only include the common-LIOCS interface 
macro (CLIOIN) in his program, and all necessary 


references to the LIOCS-C transfer vector in common will 
be generated. The transfer vector contains the entry 
points for all LIOCS-C operations. 


The file control blocks (FCB's) are 20 characters larger 
for LIOCS-C. Linked sequential files thus have a 94 
character FCB. An FCB macro (FCB) is supplied that will 
generate FCB'a, and it is strongly recommended that this 
macro be used exclusively to generate FCB's. 


A new open (OPENC), close (CLOSEC), and conversational 
loader (C_ LOAD) are used with LIOCS-C. These modules, 
in addition to LIOCSC and P_COMM, must all reside in 
SYSPOL. 


The recommended assembler for LIOCS-C is Assembler IT; 
this allows the programmer to use the macros that are 
supplied for generating FCB's, transfer vector 
references, and calling sequences (GET, PUT, and so on). 
These must all be hand-coded each time for use with 
Assembler I. In addition, future changes to LIOCS-C may 
require modifications to the FCB's, transfer vectors, 
and so on. By using Assembler II and the supplied 
macros, implementing such a change would require only 
refiling the affected macros and reassembling. When 
using Assembler I, each program would require program 
changes that must be provided by hand, thus increasing 
programmer effort significantly. 


LIOCS-C must be loaded into common core normally at the 
start of each day's operation. 
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Deciding 


whether a System Ten installation should use common or 


partition LIOCS depends on a number of inter-related factors 
which follows 


l. 


Core size and the number of partitions. Partition LIOCS 
requires approximately 1500 to 4000 positions of core, 
depending on the operations being used. LIOCS-C 
currently requires approximately 6000 positions in 
common core (in addition to the 1000 positions used by 
the hardware and system constants, tables, and the 
common mail box). Depending on the operations being 
used, then, the total amount of core required for 
partition LIOCS exceeds the core required for LIOCS-C 
when two to four partitions are simultaneously using 
partition LIOCS (refer to Figure 1-1). 


NUMBER TOTAL CORE USED BY PARTITION- 
OF RESIDENT LIOCS ROUTINES 
PARTITIONS 
USING LIOCS | MINIMUM | AVERAGE | MAXIMUM 


Note: Shaded areas indicate where partition 
LIOCS uses less total core than LIOCS-C. 


Figure 1-1 TOTAL CORE USED BY PARTITION LIOCS 


Contention versus non-contention use of disc. When 
applications will be contending for the same pools or 
files from different partitions, LIOCS-C should be used. 


LIOCS-C should be used if its capabilities outlined 
above are needed. 


If the System Ten installation does not presently 
indicate the use of LIOCS-C, but it is expected to 
expand and require LIOCS-C in the future, a conversion 
effort can be avoided by using LIOCS-C. 


More advanced future software will require the use of 


LIOCS-C. If the most capable version of software is 
wanted (e.g.,RPG), LIOCS-C should be used. 
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Section 2 
LIOCS-C 


OPERATION 

FILE CONTROL BLOCKS 
SUBROUTINES 
CONSIDERATIONS 


LIOCS-C 


COMMON 


RECORD PROTECT TABLE 


DRIVE LOCK TABLE 


TRANSFER VECTOR 


1000 


| 
| 
| 
LIOCS-C ! 
| 
| 
| 


Figure 2-1 


2/72 


PARTITION 


300 


Transient Area Used 
by OPEN, CLOSE and 
_OVLAY 


750 


1000 


USER'S PROGRAM 


LOCATION OF LIOCS-C MODULES 
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LIOCS-C 


OPERATION 


LIOCS=C 


At the beginning of each day, in response tos: 
A)ENTER PROGRAM NAME. 


the following dialogue takes place with the user on a Model 70 
Workstation or Model 80 Video Display: 


LIOCSC 
I)LIOCS-C (xxxxxx: REC-PRO, DR-LOCK OPTIONS) LOADED 


Notes: xxxxxx is date in YYMMDD format 


At this point, if the system program UDATE is filed in SYSPOL, 
it will automatically be loaded to enable the user to set the 
User Date field in Commons: 


A)SET DATE 


If no UDATE is found in SYSPOL or after the date has been 
entered in MM/DD/YY format the following message will be 
displayed: 


A)ENTER PROGRAM NAME. 
MYPROG © Load User's Program 


Once LIOCS-C has been loaded, all partitions have access to it. 
Even if a program crashes or ends it is not necessary to re-load 
LIOCS-C. 


Hardware requirements are the same as those specified in the DMF 
Manual, except Common must now be a minimum of 7K to use LIOCS-C 
and a 10K Common is recommended. 


Core memory requirements for LIOCS-C are shown in Figure 2-1. 
Beginning at location 1000 in common is the LIOCS-C transfer 
vector, coding the.user references to enter LIOCS-C. This 
coding is referenced via the user's interface generated by macro 
CLIOIN in the user's’ program (refer to Figures 4-2 and 4-3). 
The location of the transfer vector will not change so user 
programs will not have to be re-assembled should LIOCS-C change. 


OPENC and CLOSEC are similar to their counterparts in the 


existing DMF, with the exception that after execution they 
return to the user's program via LIOCS-C. 
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COS AMPLEUU6L6UglLhLUCCCC“‘iNC HO 4e72 COO OO"00 6 ~LCULTOCS9@C SAMPLE. 


RECORD NOs 


1 TITLE ‘TYPICAL USES OF LIOCS=C! 
2 SRE EE EERE REESE EERE ENUESBEE EE RN MEAD ER DEES BEER NE EE BE MESES BE NM EE BEEN ED 
3  »* MACROS TO BE INCLUDED TO DEFINE SYSTEM AREAS * 
_ 7 SRRRREREEERERERER EERE EERE EERE RR ER EERE REE ERE RE RE REE REE EREE EERE RN HE 
a 5 -CCDEF » DEFINE COMMON CORE AREAS 
c 6 _*L COEF » DEFINE PARTITION LOW CORE 
- l EJECT 
ie CLIOIN DEFINE LIOCS*C TRANSFER VECTOR | | 
EVECT 
NO Ar SESRERRESEEEEREERERERREREER EERE EERE SE RE RE REE EERE REE HEEL ER EERE SE EYEE 
i1 » BODY OF PROGRAM = © LIOCS#C MACRO CALLS * 
wn LO FRREEEMEEEEEREERE SAAR REESE ER EMRE RE RERERR EERE REAR RE RR ER ARAN EE EE REESE SEES 
> 13 NORMAL 
14 ORG _1000 
= 15 START OPEN  EXTFCBsERROR sOPEN AN EXTEND FILE 
rh 16 OPEN INOFCBsERROR *OPEN AN INDEXED FILE 
17 GEYTUP EXTFCBsERROR *GET AND LOCK A RECORD 
x 18 &<<<< USER'S PROCESSING TAKES PLACE HERF >>>> 
oO 19 UPDATE EXTFCBsERROR *UPDATE AND UNLOCK THE RECORD 
7) __ 20 #<<<< REMAINDER OF USER'S PROCESSING >>>>_ eccnsis f hos techno ae ee, 
0 21 Bae USER'S EOF ROUTINE® 
> 22 £ OF EQU * 
23 EOF INDFCBs #+10 
= 24 CLOSE INDFCBsERROR 
c 25 EOF EXTFCBs¥+10 
= eee i. _. .. _CLOSE _EXTFCB,ERROR ee te. wink & Suiad. f,. ot oe ele oes 
= 27 EJECT 
— 28 BSEEREREEERERREAREREERERERERERERERERERRERERRERRREREL EE EE EERE RE ERER ER EYE 
Zz 29. +» USER FCB'S GENERATED BY FCB MACRO * 
@ 30 BRESEEEERRREREEEEEREHERER EERE EE EEERERSEREERES EERE EEE ER EREE SERENE 
= 31 SPACE 2 
re 32  EXTFCB FCB NAME@PNAME« FNAME1 sUSE SEXTENDs AREASWKARE Ay EXIT SEOF : 
4 33 BLKL#=470sTYPESLS 
34 SPACE 2 
nt 35 INOFCB FCB NAME @PNAME eo FNAME22 USE SE XTENDs AREABWORKAC, EXIT BE OF » 
36 BLKL#188sKEYADsKEY, TYPESILS 
= 37 EYECT 
> FB FERRE RE EERE EE BER EERE ERE EERE EEE EER ER EMRE MERE EH ERE RHEE RE REMEBER BY RH 
va) 39 * PROGRAM CONSTANT AND WORK AREAS * 
rs) 40 BRLEEERERRRERAEERE EERE ERE RE RR EL ERERBRER EE RRARERERRRREARERER AER EREER ERDAS 
44 ERROR €EQU * 
mn 42 eae USER'S ERROR ROUTINE 
43 WKAREA OM &70C! ! *WORK AREA FOR EXTEND FILE 
44 WORKA2 DM i 188C' ' = s#WORK AREA FOR INDEX FILE 
5 KEY OM “N&O? SINDEX KEY ARGUMENT 
46 FSREREEBESE ER EERE EE ERERERERERERE EE ERERESE BEER ER REEEEE ERR REESE EREREENE 
47 END START 


FILE SAMPLE IN POOL SOURCE CONTAINS 


DATE OF 
EXPIRATION 


CHANGE ~ 
LEVEL 


FILE NAME TYPE 


DATE OF 
CREATION 


DESCRIPTION 


47 SECTORS 


SAMPLE000100 


SAMPLEOOQ200 | 


SAMPLE000300 
SAMPLE000400 
SAMPLEO00500 
SAMPLEOQ00600 
SAMPLE000700 


_SAMPLE000800 


SAMPLEO00900 
SAMPLEO001000 
SAMPLE001100 
SAMPLE001200 
SAMPLE001300 


_. SAMPLE001400 


SAMPLEOO1500 


SAMPLE001600 
SAMPLE001700 
SAMPLE0O01 800 
SAMPLE001900 


SAMPLE002000 


SAMPLE002100 
SAMPLE002200 
SAMPLE002300 
SAMPLE002400 
SAMPLE002500 
SAMPLE002600 


SAMPLE002700. 


SAMPLEO02800 
SAMPLE002900 
SAMPLE003000 
SAMPLE003100 


_ XSAMPLE003200 


SAMPLE003300 
SAMPLE003400 


XSAMPLE003500 


SAMPLE003600 
SAMPLE003700 
SAMPLEO03800 
SAMPLE003900 
SAMPLE004000 
SAMPLE0O04100 
SAMPLE004200 
SAMPLE004300 


_SAMPLE004400° 
SAMPLE004500 


SAMPLE004600 
SAMPLE004700 


0105A1 
Q01052e 
010523 
010524 
010525 
010556 
010526 


010555 


010527 
010578 
010529 
010561 
010562 


010530 


010531 
010532 
010533 
010534 
010535 
010563 
0105464 
010565 
010546 
010567 
010568 
010557 
010536 
010537 
010538 
010558 
010539 


010540 —g. 


010559 
010541 
010542 
010560 
010543 


010544 


010545 
010546 
010547 
010550 
010551 
010552 
010553 
010554 
A414 


3-SDONT 


3-SDO0N1 


aa4 


eL/2 


€-Z% ainbi4 


Ow DVW NIOIND Ad GALVAANAO AOLIAA AAASNVAL D-SDO!NI 


__9009 1040C 


SE@~* LOCN 


0008 


9003 Q000 . 


0004 1000C 
0005 1Q00C 
0006 1000C 
0007 1000C 
0008 1020C 


0010 1060C 
0011 1080C 
0012 1100C 
0013 1120C . 
0014 1140C 


INSTR/DATA OP 


_ 9015 1160C.. 


0016 1180C 
0017 1200C 
0018 1210C 
0019 1220C. 
0020 1230C 


_0021 1250C 


0022 1270C 
0023 1300C 
0024 0000 
0025 0000 
0026 0990 


_0Q27 1000. . 


‘SYSTEM TEN ASSEMBLER II 


A/R 


0000 


1000C 
1000C 
1020C 
1040C 
1060C 
1080C 
1100C 
1120C 
1140C 
1160C 
1180C 
1200C 
1210C 
1220C 
1230C 
1250C 
1270C 
1300C 
1300C 


0990 
0001 
9000 


B/S 


0010 


TYPICAL USES OF LIOCS@C 


LINE 


0095 

0096G 
0097G 
0098G 
00399G 
0100G 
0101G 
Q102G 
0103G 
0104G 
0105G 
0106G 
0107G 
0108G 
0109G 
0110G 
0111G 
0112G 
0113G 
0114G 
0115G 
0116G 
0117G 
0118G 
0119G 


eCLIOI 


*BASEC 
GET 
*PUT 


+INSRT._ 


DLE TE 
*UPDTE 
¢BOF 
+E OF 
ewRIEF 
*READ | 
eWRITE 
*QPEN 
*CLOSE 
¢GETUP 
*READU 
eOVLAY 
+RETRY 
+OVRET 


*USERX 


Q120G . 


01/04/72 PAGE 0003 

IMAGE Cc 
CLIOIN * DEFINE LIOCS@C TRANSFER VECTOR 
ORG ch a cece pest aes halite eA eth thea cea ce cen oa setesiaten Tn 
COMMON — 
ORG. 1000 | ae 
ORG * BASE OF TRANSFER VECTOR 
ORG *BASEC+20 : 
ORG *BASEC+40 
ORG. *BASEC+60 ot SSA eth, Leah og) Sie Past ail ee he 
ORG +BASEC +80 
ORG +BASEC+100 ee Soest 
ORG *BASEC+120 
ORG — *BASEC+140 Sia bate ah re 
ORG *BASEC+160 
ORG _. .©BASEC+180. Big iie eee tee ne aes Sener nae 
ORG *BASEC+200 
ORG *BASEC+210 | 2 7 eee eee eet 
ORG *BASEC+220 
ORG +“BASEC+230 _ = : 
ORG *BASEC+250 
ORG... eBASEC+270 = CULOAD OVERLAY FROM SySPOL 
ORG *BASEC+300 RESUME AFTER DISC FAULT 
ORG OPTIONAL USER 'EXEC!' ADMRESS cree _ 
NORMAL 
ORG 990 | : ae ae 
DM c10 USER EXITS 
ORG _. eCLIOI 0. RESTORE USER LOCATION COUNTER | 


3-SIO11 


2L/z 


cc 


I=SDO0I1 


SEQ+* LOCN 
0010 
BOO EA. ccs 
0012 
0013 0000 
0014 0000 
0015 
1000 
0016 
1020. 
1030 
0017 
1040 
—.—__1050 _ 
0018 
0019 
1060 
1070 
0020 
0021. 


0023 
1080 
1090 
0024 
1100 _. 
1110 


0025 
1120 
1130 


STIVD OYDVW D-SDOI] AWdWVS~) #77 BNI 


0026 


1010 


0022 1080 | 


SYSTEM TEN ASSEMBLER 


INSTR/DATA 


VOPS15220P 
P1QV091364 


VOPS15120P 
P1RU491364 


voPpsi5i2ePp 


VOPS15108P 
P1QV091364 


voPsi5112P 
P1RU491100 


VOPS15121P 


P1RU491364 


voPsi5iiep 
P1QV091140 


.VOPS15121P 


P1QV091364 


1000 


11 0031 


11.1160. 


11 0031 
11 1254 


11 0031 


P10V091364 11 1160 | 


11 0031 
11 1160 


~ 1080 
11 0031 
11 1254 


11 0031 
11 1254 


i1 0031 
11 1160 


11,0031 | 


11 1160 


on oo 
oo 


Oo 


oo 


oo On oo 
oo oo 


on 
oo 


oo 


Tome’ 


oo 


oo 


B/S 


1200C 
1364 


1200C 
1364 


1220C 
136% 


1080C 
1364 


1120C 
1100 


1210C 


1364 


1120C 
1140 


.1210C 


1364 


wn wow 
eo 


wu 
oo 


wun 
oo 


wa 
oo 


woul 


wo ol 


wu 


TYPICAL USES OF LIOCS=C 


LINE 


0123 


— 9124, 


oo 


oo 


oO °o 


oo 


0125 
0126 
0127 
0128 
0136G 


0138G 


0140 
0148G 
0150G 
0152 
0155G 


0157G . 


0159 
0160 
0171G 
0173G 
0175 
0176 
0177 


0178 


0190G 
0192G 
0194 


0204G 
0206 
0218G 
02206 
0222 


PEPE PE VE SETEPeVeVere ye tere veveye Peveres errr ere rer er eres ev ererere yey | 


01/04/72 PAGE 0004 


IMAGE 7 C 


* BOOY OF PROGRAM © © LIOCS=C MACRO CALLS UU UU 


BREREREREREREREE EERE REEEREEREERERERE SEER EERE EYRE ERR EERE EE EE ER SS BE EEE 


START 


START 


CCC 


BRC 
aue 
EOF 


0202G 


02306 _ 


02326 


NORMAL 


REMAINDER OF USER'S PROCESSING >>>> | 


USER'S EOF ROUTINE® 


EQU 


EXTFCB(O)sERROR(S) 


_INDF CB, #410 


_ INDFCB(0),¥+10(9) 


1000 
EXTFCBsERROR 
31(6)seOPEN(5) 


*OPEN AN EXTEND FILE 


INDFCBsERROR *OPEN AN INDEXED FILE _ 
31(6)s*OPEN(5S) 


INDFCB(0)sERROR(9) 


EXTFCBsERROR  § ¥*GET AND LOCK A RECORD. gh Os, eee Se ARE Ses 
312¢GETUP 
EXTFCB(O)sERROR(9) 


PROCESSING TAKES PLACE HERE 
EXTFCBsERROR 
31(6)s+UPDTE(S) 
EXTFCB(O)sERROR(9)  . 


>>>> 


* 


31(6)seEOF(5) | 


INOFCB»ERROR 


BC. BiG )eeCLOSE(S) _ 


SLAG )eeCLOSE(5) 


INDFCB(0),ERROR(9) 
EXTFCBs¥+10 
31(6)seEOF(5) 
EXTFCB(O)s¥+10(9) 
EXTFCBsERROR 


EXTFCB(0)sERROR(9) 


I-SDOI1 


3-SDO0N1 


9-7 
NOILVYANID OWNDVW 9D4 JIdWVS G-zZ enNbiy 
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SYSTEM TEN ASSEMBLER II TYPICAL USES OF LIOCSeC 01/04/72 PAGE 0005 
SEQ@e LOCN INSTR/DATA OP A/R MI B/S MI LINE IMAGE Cc 
0028 OK MTEC EP ePePerePerevereTereve SET eTeveve vere eevee vevererevererererererery | 
0029 et ttt ee uw 6 0236 .* USER FCB'S GENERATED By FCB MACRO 5 
0030 0237 SRERERRRERESERERRREHSABRE SPEEA EREREEREERESERESERER ERE RMERRE EE ERED BEBE S 
sn MOOS O setetite 1k, Rewete Pale) He ede OME Oe 0239. EXTFEFCB FCB... NAMEsPNAME oF NAME 1, USESEX TEND, ARE AsWKAREASEXITmEQF, x 
0033 BLKL*470s,TYPE#LS 
OOS noo eee Se ee ge ek | ARS oe bt 02406 #*#LIOCS FCB (711220)  °. . »§»=5»=»= = == 
1160 1160 0263G EXTFCB EQU ¥( 94) 
1160 Q. : Q0001 _. 0001 0267G._—s.... ... OM... ON os center, “uu te FILE TYPE 3 tS 7 
1161 PNAME 0001 0006 02696 DM C6'PNAME! POOL NAME 
_..... £167. FNAMEL1  . 0001 0006 0271G | . . DM... CO'FNAMEL! FILE NAME 
1173 1364 0001 0004 0273G DM A'WKAREA! WORK AREA ADDRESS 
1177. 0470 °°}. }§&=&8.... QQO1 ...... 0004 ........02765G... .. .. DML Ate7Qto0[0|[6€™6™F™™L OB 
1181 1080 oooi 0004 0277G DM A'EOF! USER EXIT ADDRESS 
. . £1485 . me Q001 0006 0279S DM SOG le Ne ie ; PASSWORD — Sst) es toss et aa eee 
1191 010 o0o01 0003 0281G DM c'010! ACTION FLAGS $ EXTEND 
_ 194 $688. 0001 CO 0004 _.....0283G.. _..DM _ _C'sssse! _ : _ ss SECONDARY ALLOCATION 
1198 $$$ 0001 0004 0285G DM C'ssss! PRIMARY ALLOCATION 


facet AOR oe en OOF ce OOS Coat JOR EOS ass 2 DM EO be Be 8 PRESERVE 


0035 0292 INDFCB FCB NAME #P NAME oF NAME 2s USE®EX TEND» ARE ASWORK ADP SEXTTSEDFs x 
BM DIG: Soc rst he eaters eee ae o.oo. BLKL OL BBsKEYADSKEY,TYPE@ILS pee ae pemeene 
0004 0293G **LIOCS FCB (711220) 
ARDS eo a ate OW. fr ale, Soho ent ee OG INDE CR EGO =. RCD Ds ee 
1254 I 0001 0001 0322G DM on FILE TYPE $ ILS 
1255 PNAME | 0001 0006 0324G $$§.OM _. C6O'PNAME' = =POOL NAME 
1261 FNAME2 0001 0006 0326G OM Ce'FNAMEe2! FILE NAME 
1267 1834). 0001 0004 0328G OM ._ A'WORKA2! . WORK AREA ADDRESS _ 
1271 0188 0001 0006 0330G DM A'188' BLOCK LENGTH 
1275 1080 °°} } #4«39001. ooOQ* _. .0332G OM  A'EOF' |_____ USER EXIT ADDRESS 
1279 0001 0006 03346 OM Ce! ' PasSwORD 
1285 010...  # .. 9001 0003 | 0336G NS * |: EME O85. ° O° Speen eee ACTION FLAGS $: EXTEND ee ee 
1288 $838 0001 0004 0338G DM C'ssss' SECONDARY ALLOCATION 
1292 $$$ a 0001 0004 0340G DM  ##Cr$sset PRIMARY ALLOCATION —— 
1296 2022 0001 0004 0343G OM AtKey? KEY ADDRESS 
‘bi as yop OY et Be _ 0001 0064  .0346G OM COs!’ # (RESERVED) 


9-S90N 


LIOCS-C 


en |) | ee 2]3 6 | 7 20 | 21 24 


FCB TYPE POOL NAME FILE NAME WORK AREA USER EOF 
ADDRESS ROUTINE 
ADDRESS 


25 30 | 31 33 | 34 


FILE ACCESS ACTION FLAGS SECONDARY 
PASSWORD ALLOCATION 
SPECS 


* 93 FOR LINKED SEQUENTIAL FILES, 109 FOR INDEXED LINKED SEQUENTIAL FILES. 


Figure 2-6 USER FILE CONTROL BLOCK(UFCB) — 
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LIOCS-C 


User FCB: 


1. 


Ze 


Post Open FCB: 


This 


FILE CONTROL BLOCKS 


The user file control block is as described in the DMF Manual, 
with the following modifications (refer to Figure 2-6)... 


The FCB must not be in common core. (Same as before) 


Work Area Address - Field 4, Positions 13 to 16. User's 
Work Area must be in partition. 


Logical Record Size - Field 5, Positions 17 to 20. The 
maximum record size is 9,999 (but full record must fit 
in partition). 


User EOF Routine Address - Field 6, Positions 21 to 24. 
Must not be in common core. 


Reserved for Post Open FCB - Field 12, Positions 46 to 
n. If the file is not indexed, this field must be 52 
characters (including field 11). If the file is 
indexed, this field must be 64 characters in length to 
allow for expansion by the _OPEN operation. 


as described in the DMF Manual, with the following 


modification (refer to Figure 2-7). 


1. 
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Save Start of Record (_FCBSF) contains the start address 
of a multi-sector record. 


Record Protect Switch (_FCBGU) set ON when a file is 
using record protect. 


Open flag (_FCBOP) is set to ‘'!' after the file is 
opened. 
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FCB TYPE 


USER STATUS 
CODE 


NEXT SECTOR 
ADORESS 
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FIELDS THAT CAN BE MODIFIED BY USER AFTER FILE 
HAS BEEN OPENED. 


_FCBWA™ _FCBLR™ _FCBEF™ 


POOL LABEL FILE LABEL WORK AREA LOGICAL RECORD USER EOF 
ADDRESS ADDRESS ADDRESS SIZE ROUTINE 


ADORESS 


CONTENTION CONTROL FLAGS SECONDARY PRIOR SECTOR CURRENT SECTOR 
CONTROL SECTOR ALLOCATION ADDRESS ADDRESS 


SECTORS ALLOCATED EOF MARK POINTER TO PRIOR SECTOR, RECORD PROTECT 
DISC ADDRESS EXTENSION CURRENT SECTOR, SWITCH 
PORTION NEXT SECTOR OF 
START OF 
MULTI-SECTOR 
RECORD 


109 


(ACTUAL) KEY j|KEY DISPLACEMENT KEY LENGTH POINTER 10 


ARGUMENT INDEX ROOT 
ADDRESS | 


Figure 2-7 POST OPEN FILE CONTROL BLOCK (POFCB) 
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ee IN Ey READ KEY B 
Key A———»® Key D-__» Key 6 —_w etc. 


Record A——® Record D ——® Record G —petc. 


pata 
GET RECORD A 


GET NEXT SEQ. RECORD 
KEY IN RECORD DOES NOT EQUAL KEY B 


SET ERROR STATUS 8 


USER'S ERROR EXIT 


READ KEY A 


SEARCH INDEX FOR KEY A 


TAKE POINTER TO RECORD A 


RECORD A PLACED IN USER'S BUFFER 


Figure 2-8 DATA RETRIEVAL FROM AN INDEXED FILE 


INDEX ——_—_———————-.. SEARCH INDEX FOR KEY 
Key A cop hey 022 -» Key f —p etc. 


READ KEY -B 
NOT FOUND - TAKE POINTER TO KEY A 
G 


B 

ET RECORD A 

GET NEXT SEQ. RECORD 
Record A—+ Record B——®Record D Record 6 ——? etc. KEY IN RECORD EQUALS KEY B 

R 


Ne Se A A ae 


RECORD B PLACED IN USERS BUFFE 


Figure 2-9 DATA RETRIEVAL AFTER RECORD INSERTION IN AN INDEXED FILE 
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SUBROUTINES 


Reference Manual provided 


All subroutines not listed below operate as described in the DMF 
for "sector" 


"multi-sector record" 


is substituted 
in all the discussions. 
Open A File 
Main Subroutine Name: _OPEN 
Function: 
The OPEN subroutine 


calls the 


system 
converts the UFCB into the POFCB. 


program OPENC, which 


Description of Operation: 


_OPEN functions in the same way as the DMF OPEN subroutine, 
though it uses a transient named OPENC 


which returns to. the 
user's program via LIOCS-C. 
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Close A File 
Main Subroutine Name: _ CLOSE 
Function: 


To finalize the state of the files created by the user's 
progran. 


Description of Operation: 
_CLOSE functions in the same way as the DMF CLOSE subroutine, 


though it uses a transient named CLOSEC which causes returns’ to 
the user's program via LIOCS-C. 


LIOCS=C 2-12 2/72 


2/72 


LIOCS-C 


Read A Record 
Main Subroutine Name: READ 


Function: 


To access an indexed linked sequential data file in a random 
manner and to read a desired record, or its logical successor, 
into the user's buffer. 


Description of Operation: 


_READ enables the location and retrieval of data in a file, 
whether or not there is a one-for-one entry in the file index. 
If the required data is not found, then the record having the 
next higher key to that requested is placed in the user's 
buffer. 


Figure 2-8 illustrates an indexed file and two attempts to read 
from that file, one of which is successful while the other is 
not, Since key/record B does not exist. After the resulting 
error exit the user's FCB points to record D. The user can now 
employ _INSRT to link record B between records A and D. Figure 
2-9 shows the result of this insert, and the way in which the 
inserted record is retrieved. 


A further example of the use of READ is given in Figure 2-10. 
Here, the index contains one entry for every four keys, and the 
consequent search and retrieval sequence is detailed in the flow 
diagran. 


For the data retrieval logic to operate successfully, the data 
file must be in ascending Key sequence. But, if the user has 
more than one index per file it is possible that the data file 
is out of key sequence for one of the file indexes. If a data 
file is not in key sequence, therefore, there must be a one-for- 
one index, and in this case, the function INSRT cannot be used. 


Conditions: 


1. A Key of high value (e.g. underscores) should be placed at 
the end of a file to prevent any attempted _INSRT off the 
end of the file. 


2. Since the search logic reads each record into the user's 
buffer, any record to be inserted must only be placed in the 
buffer immediately prior to the INSRT taking effect. 


Ko If indexed access is used on an extend file, the function 
EOF must be used before CLOSE. 


4. When setting up the index for a file having multi-sector 
records, the NENTRIES parameter must contain a multiple of 
the number of sectors per record. 


5. If a record is not found in an indexed file and its key is 


not lower than the lowest key in the index, error status 8 
is set in FCBST and the User's Error Exit is taken. 
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6. If a record is not found in an indexed file and its kKey is 
lower than the lowest key in the index, error status 9 is 
set in FCBST and the User's Error Exit is taken. 
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[ree eee ee ee 
Key A——___________________________-» Key E ——petc. READ KEY OD 


SEARCH INDEX FOR KEY D 
NOT FOUND 


TAKE POINTER TO LESSER KEY (A) 
GET RECORD A 


GET NEXT SEQ. RECORD (B) 


Record A— Record B—+Record C —-»Record D —»Record E —v etc. 
Sa NR ee 


KEY IN RECORD B DOES NOT EQUAL KEY D 
GET NEXT SEQ. RECORD(C) 


KEY IN RECORN C DOES NOT EQUAL KEY D 


GET NEXT SEQ. RECORD (D) 
KEY 0 CORRESPONDS 
EXIT T0 USER 


Figure 2-10 DATA RETRIEVAL FROM A MULTI-SECTOR RECORD INDEXED FILE 
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Read And Lock A Record 
Main Subroutine Name: _READU 
Function: 


To access an indexed linked sequential data file in a random 
manner, lock the desired record and read it into the user's 
buffer. 


Description of Operation: 


_READU operates in a manner similar to READ. —_READU also 
inspects the Record Protect Table (see Record Protection), locks 
each record in turn, inspects it and unlocks it if it is not the 
required record. If the required record is not encountered in 
the file, its logical successor is locked and read into the 
user's buffer. _READU honors record locks in its search for a 
record. If arecord it is attempting to inspect is locked, it 
will switch out until that record is unlocked. 


A record locked by _READU will be unlocked by any subsequent 


LIOCS-C operation from the same partition on the same FCB. Only 
one record per FCB may be locked at a time. 
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Write A Record 
Main Subroutine Name: _WARITE 


Function: 


To write the user's work area into an indexed linked sequential 
file, provided its Key exists in the relevant index file. 


Description of Operation: 


Upon issuing a WRITE, the index is searched for the desired 
key. If the key is found in the index, the user's work area is 
written into the sectors pointed to by that index entry. No 
check of the subject data record is made to ascertain it does 
indeed contain the desired key. If inserts have been made into 
the file, erroneous results can be obtained using WRITE. 


If the desired key is not found in the index, the user's error 
exit will be taken with the status code set to 8 or 9. FCB 
pointers are set so a subsequent GET will obtain the record 
pointed to by the index entry with the next lower key. It is 
then the user's responsibility to issue GET's until the desired 
record is found and then issue an UPDTE or _INSRT. _WRITE does 
not provide any record protect facility. 


Conditions: 


1. WRITE can only be used if no inserts have been made in the 
file since the last MAINT/INDEX run. 


2. The only efficient use of WRITE is with an index built with 
a density of one index entry per data record. 


5. If both conditions above are not met, _READ/ READU followed 
by _UPDTE or _INSRT should be used. 
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and Lock A Record 
Main Subroutine Name: _GETUP 
Function: 


To lock the next logically sequential record and to read its 
contents into the user's buffer. 


Description of Operation: 


The operation of _GETUP is similar to that of the main 
subroutine GET in partition LIOCS, with the exception that 
_GETUP locks any record it retrieves. If the record it is 
attempting to read has been previously locked by _GETUP or 
_READU, the partition will switch out until the record is 
unlocked. A record locked by GETUP will be unlocked by any 
subsequent LIOCS-C operation from the same partition on the same 
FCB. Only one record per FCB may be locked at a time. 
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Update A Record 
Main Subroutine Name: _UPDTE 
Function: 


To write the contents of the user's buffer into the current 
record. 


Description of Operation: 
_UPDTE behaves in a similar manner to the existing DMF main 
subroutine, with the exception that if it refers to a locked 


record after a GETUP or READU operation, it will unlock that 
record after it has been completely updated. 
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Insert A Record 
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Main Subroutine Name: _INSRT 
Function: 


To write from the user's buffer into a record, which is then 
linked between the prior and current records. 


Description of Operation: 


_INSRT operates in the manner described in the DMF Manual, with 
the addition that all partitions have the possibility to insert 
into the same file. 


Multi-partition Insert into the Same File: 


Primary and secondary allocation must be specified in the FCB by 
the users a primary allocation of zero, for an extend file, is 
acceptable. There is no conflict during OPEN, CLOSE and 
allocation, since the pool directory is automatically locked for 
all allocating of sectors to private free sector lists. When an 
_INSRT is made, the following sequence takes place. The last 
sector of the previous record is reread, and the link is 
compared with the sector address of the first sector in the 
current record: non-equality indicates that another partition 
has simultaneously made an INSRT at this point. Consequently, 
the FCB is. set up so issuing a GET will retrieve the record 
just inserted by the other partition, and the user's error exit 


is taken with error. status V. Figure 2-11 illustrates an 
example of two partitions (O and 1) attempting simultaneous 
inserts between records l and 2. Partition O succeeded in 


inserting record 1A, while partition 1 took an error exit and 
its insert failed. A GET was then taken by partition 1, and 
record 1A was obtained; and since partition 1 did not want an 
insert between records 1 and 1A, another GET was taken and 
record 2 was obtained. _INSRT B then inserts record 1B in the 
desired location between records 1A and 2. 


Note that partition 1 obtained record 2 twice, owing to the 
alteration of the sequence of the records. This factor must be 
taken into account by the user in the preparation of his 
program. Note also that after an error exit with status V, the 
only valid operation is GET, after which all I/O operations are 
valid. However, GET will overwrite the data in the user's 
buffer; the user must be able either to re-create his data in 
the buffer or to GET into another buffer. 
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PROGRESS OF DATA FILE OPERATIONS 
AT START - PARTITON 0 PARTITION 1 
Record 1 
Record’ GETS RECORD 1 GETS RECORD 1 
GETS RECORD 2 GETS RECORD 2 
AT INSERT (A) 
Record 1 ® INSERT INSERT 
Record 1A INSERTS RECORD 1A INSERTS RECORD 18 
Record 2 
Record 3 


GET TAKES ERROR EXIT 
GETS RECORD 3 STATUS V 
AT INSERT(B) GET 
Record 1 GETS RECORD 1A 


Record tA 
RecordiB 


Record 2 GET 
Record 3 GETS RECORD 2 
INSERT 
INSERTS RECORD 1B 
GET 
GETS RECORD 3 


Figure 2-11 MULTI-PARTITION INSERT 
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Find 
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End of File 
Main Subroutine Name: _EQOF 
Function: 


To position the file 
temporary or an absolut 


Description of Operation: 
_EOF operates in the 
addition that it will 
subsequent operations: 

_GET will take the 
_UPDTE will update 


_INSRT will insert 


_DLETE will delete 


at the record that contains either a 


e end-of-file mark. 


same way as its DMF counterpart, with the 


set up the user's FCB so that 


user's EOF exit. 
the last record in the file. 
ahead of the last record in the file. 


the last record in the file. 
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BUFFER 
SECTOR 101 SSS 102 (Link to next sector) 
94 CHARACTERS ————» 
BUFFER 
SECTORS 101 NTTITTITITININNTT ELLE LLL 
AND 102 IA 10.3 
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SECTORS 101 
AND 102 
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Figure 2-12. PUTTING A MULTI-SECTOR RECORD TO DISC 
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CONSIDERATIONS 


Multi-sector Records: 


The maximum permissible record size is limited only by the 
amount of partition core the user has available. If the user 
specifies a block size of, say, 194 characters and then 
initiates a PUT, the following sequence occurs (refer to Figure 
2-12). 


1. LIOCS-C writes the first 94 characters directly from the 
user's buffer into the first sector. 


2. This is followed by the next 94 characters being written 
into the next sector. 


3. Finally, the remaining six characters are written into 
the next sector. 


No exit is made to the user until the contents of the entire 
buffer is written. In response to the next PUT the first part 
of the record will be written in sector 104, the remaining space 
in sector 103 being left unused. 


_GET, _READ, _INSRT, _DLETE and _UPDTE operate in a similar 
manner to PUT, though GET and READ do not transfer any of the 
‘rubbish' from the last sector into the user's buffer. 


Record Access Time Considerations 


LIOCS=C 


LIOCS-C has the ability to read all sectors of a multi-sector 
record "on the fly" (i.e. on the same revolution of the disc) 
provided the sectors reside in consecutive dise addresses and 
the record is an integral multiple of 94 characters in length. 
All sectors of a record are read directly into the user's buffer 
unless the record does not end on a sector boundary. Then the 
last sector must first be read into the system buffer (200-299 
in partition) and a portion of it moved to the user's buffer. 
This eliminates overlaying the area immediately after the user's 
buffer when reading this last "short" sector. This added 
processing makes it impossible to read the first sector of the 
next record on the same revolution. Since LIOCS-C automatically 
scans through the file for the proper key on a READ, this is an 
important consideration, especially when a file has a density of 
many records per index entry. 


It is recommended that record length be specified as a multiple 
of 94 characters. It costs no disc space; each record must 
begin on a sector boundary anyway. The potential time savings 
are worth the cost of a few core positions to pad out the user's 
buffers to integral multiples of 94 characters. 


2-24 2/72 


2/72 


LIOCS-C 


Record Protection: 


LIOCS-C provides a facility to prevent the simultaneous update 
of the same record by more than one partition. This is afforded 
by _GETUP (_GET for update), READU (_READ for update), and a 
ten entry Record Protect Table in Common. When a partition 
issues a GETUP or _READU, the partition number and the address 
of the first sector of the record obtained are placed in the 
Record Protect Table. The record is unlocked when the locking 
partition performs any subsequent LIOCS-C operation on the file 
in question (normally an UPDTE). While a record is locked, any 
reference to it by GETUP or READU from another partition will 
cause that partition to switch out until the record is unlocked. 


Locked records are only protected from access by _GETUP or 
_READU$ all other LIOCS-C operations by-pass the record protect 
logic. For instance, a record locked by a _READU from partition 
1 may be accessed simultaneously by a READ from partition 53. 
LIOCS-C does not restrict partition 3 from now issuing an UPDTE 
on the record it has just obtained via a READ, which would 
probably overlay any updating done on the record by partition l. 
This feature allows read-only accessing of files being updated 
by _READU and _GETUP. If two or more partitions have the 
possiblity of updating the same record simultaneously, it is the 
programmer's responsibility to utilize _GETUP and _ READU so 
LIOCS-C can coordinate the use of records by all partitions. 


There is no limit to the number of FCB's that may have records 
locked, but the Record Protect Table can only accommodate ten 
entries at a time. Should it become filled, any partition 
attempting to lock a record will switch out until an entry in 
the table is freed. Filling the table is an unlikely event. 
Still, good system design dictates that any partition lock a 
record for only as long as absolutely necessary to perform an 
update. This is primarily a consideration to increase system 
response when many partitions are referencing the same records 
but it will also minimize competition for table entries. 


If a partition should go to a load condition, the address of any 


records it has locked will remain in the table. Whenever’ the 
conversational loader (C_ LOAD) is used to load a program, it 
purges all entries in the Record Protect Table for all 


partitions in a load and for the partition in which it is 
running. 


Drive Lock: 


A drive lock routine is included to prevent any partition from 
accessing a drive already accessed by another partition, and to 
maintain the lock on the drive until the controlling partition 
has completed I/O operation, i.e. until every sector ina multi- 
sector record has been read or written. This facility reduces 
I/O times by minimizing head movement. The drive lock routine 
references a ten-character field; known as the Drive Lock Table, 
which is situated in locations 510C to 519C. 
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The left-most position (510C) refers to drive O, the next to 
drive 1, and so on, the right-most position (519C) relating to 
drive 9. The state of each position indicates whether or not 
the relevant drive is locked; if the position contains a blank, 
the drive is free; if it contains the partition number the drive 
is locked. (In Figure 2-13, drives 0, 2 and 3 are locked by 
partitions om 4 and 2 respectively. A single-character 
partition number is used: 10, 11, 12 etc. are represented by, 
Q, R etc., respectively. ) 


Any attempt by a program to use a locked drive will cause 
control to be switched to the next partition. However, the 
partition is not informed that this event has occurred, and it 
attempts to access the locked drive each time it has control. 


If the controlling partition assumes a load condition before the 
I/O operation is completed, it is possible that the drive will 
remain locked. The conversational loader clears from the table 
all locks if the associated partition is in a load condition. 
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Figure 2-13 DRIVE LOCK TABLE 
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Error Exit: 


Physical 


During an error exit, location 990 in partition contains the 
instruction 


BC ERROR(5),NORMAL(5) 
so that the instruction 
MN _USERX+6(4),... 
can be used to obtain the address of the calling sequence. 
NORMAL is the normal return address. 
N.B. A move numeric instruction must be used. 
I/O Errors: 
If a physical I/O error (status code 1) occurs within a file, it 
is not advisable to continue using that file after an error 


exits; the file should be closed, and both the file and pool free 
sector list should be checked for correct link addresses. 


Drive Not Ready: 
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If a drive is not ready, the message 
A)READY DEVICE Dn. 


will be displayed on the CONO device. If the user responds via 
the CONI device by setting a FLAG condition (pressing any 
control key on the workstation or video display), the user's 
error exit is taken with status code 1 set. Any other response 
via the CONI device will cause the I/0 operation to be retried. 


If either the CONO or CONI device is unassigned (assigned as 
NODEV), the user's error exit will be taken with a status code X 


set. The only legitimate option the user may then exercise in 
his error routine is to branch to _RETRY within LIOCS-C with a 
particular condition code set. At RETRY is a branch 


instruction whichs 
1. For a condition code of 2, will retry the I/O operation. 


2. For a condition code other than 2, will take the user's 
error exit with condition code l set. 


This allows I/0 error retries from “blind" partitions under 
program control. 
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Error Status Code: 


Table 4-7 of the DMF Manual is replaced by Table A-l. 


Sector Allocation and Contention Problems: 


As described in the DMF Manual, with two additions; multi- 
partition inserts (which have already been dealt with under’ the 
heading _INSRT) and multi-partition deletes. 


Multi-partition Delete in the Same File: 


Multi-partition deletes in the same file are not permitted. If 
one partition references a file in any way, and a—- second 
partition deletes a record that the first partition is about to 
access, the results are unpredictable. If it is required to 
delete a record in these circumstances, the relevant record must 


be obtained using Record Protect, and be _UPDTE'd with 
characters that will indicate to all programs referencing that 
file, that the record has been deleted. The record may be 


deleted at some later time by a user-written program operating 
in a non-contention environment. 


Multi-partition Extend in the Same File: 


Overlay 


LIOCS-C does not provide any additional capabilities for 
physically extending (i.e. PUT beyond EOF marker) an extend 
type file than Partition LIOCS provided. A physical extension 
is still linked onto the file at Close. ‘If two physical 
extensions are made to the same file simultaneously, when the 
second one is closed it will overlay the link to the extension 
of the first. If physical extension is to be used, one FCB must 
be passed back and forth through Common to each contending 
partition as was necessary in Partition LIOCS. Common flags 
must be used to make sure only one partition uses the common FCB 
at a time. 


Logical extension from many partitions may be accomplished under 
LIOCS-C contention control by using INSRT in front of a trailer 
record. 

Routine: 

LIOCS-C contains an overlay routine to load modules stored in 
SYSPOL. The user places the name of the program to be loaded in 
partition locations 25-30 (_LNAM) and branches to  OVLAY in the 
LIOCS-C transfer vector. 

If the user wishes to execute the overlay after loading (begin 
executing at the address defined in the EXEC card), the calling 
sequence 


B _OVLAY 


is used. 
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If the user wishes to load the overlay and return to the calling 
program, the calling sequence 


LINK  _LXR3, OVLAY 


is used and the overlay module must be terminated with an EXEC 
card image specifying the address 1300C generated by 


EXEC  _OVRET 


in the overlay module's source deck (_OVRET is defined by 
including the macro CLIOIN in the source deck). An overlay 
loaded in this manner must not modify index register 3, 
otherwise the user's return address will be lost. 


In neither case is it necessary for the user to load the Locator 
or set its search arguments in low core. All overlays loaded 
via OVLAY must be previously filed in SYSPOL. If an overlay is 
not found, the message 


L)progname NOT FOUND. 


is displayed on CONO, if it is defined. Whether or not CONO is 
defined, the partition will then go to a load with the Program 
Check Area (_LCKR;40P to 44P) containing the address of the 
above message. 


The overlay routine does not require P_COMM or the Locator to be 


loaded by the user; the Locator is loaded automatically by 
LIOCS-C and P_COMM is not used. 
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LIOCS-C STATUS CODES 


Table A-1 STATUS CODE SETTINGS (0-9) 


STATUS LIOCS MAIN 
CODE SUBROUTINE CONDITION INDICATED 
(SPA RS IO OSORIO I I EN EI a REEDED EA PE A DO a 


(NOT USED) 


An irrecoverable read parity or a flag error was encountered while 
attempting to perform linked sequential disc I/0 

or 
A write flag error has been encountered while attempting to perform 
linked sequential disc I/0. 


(NO LONGER USED) 


The pool free sector list is exhausted. 


The user's key argument was found in the index file, but is missing 
from the indexed data file. The desired data record has either been 
deleted, improperly updated, or a record with a higher key inserted 
in front of it. The record in the user's work area contains the 
first record encountered with a key greater than the one desired. 

An _INSRT could now be performed if the sequence of the data file 
can still be assumed. 


_PUT, UPDTE, Invalid operation was attempted on a read-only file. 
or WRTEF 


_ PUT An attempt was made to write beyond the absolute end-of-file mark 
on a fixed-allocation file. 


_INSRT, DLETE | Invalid operations on fixed-allocation or read-only file. 


(NONE) (No longer used -- if a read error occurs during READ or WRITE, 
status code 1 is set.) 


Key argument not found in the index file, but it is higher than the 
lowest key in the index file. 


No record containing the specified key has been found in the data 
file. The record in the user's work area and referenced by the FCB 
pointers is the first one encountered in the data file with a key 
greater than the one specified. 


FCB pointers set so GET will retrieve record with next lower key 
contained in the index. User's work area is undisturbed. 


Key argument not found in the index file. It is lower than the 
lowest key in the index file. 


No record containing the specified key has been found in the data 
file. The record in the user's work area and referenced by the FCB 
pointers is the first one encountered in the data file with a key 
greater than the one specified. 


FCB pointers set so GET will retrieve record with lowest key in the 
index. User's work area is undisturbed. 


NOTE: THE CONTENTS OF THE STATUS CODE FIELD OF THE POFCB ARE NOT INDICATIVE OF ANY CONDITION 


UNLESS THE PROGRAM BEING EXECUTED BRANCHES TO AN ERROR ROUTINE SPECIFIED IN A LIOCS MAIN SUB- 
ROUTINE CALLING SEQUENCE. 


NOTE: ERROR CONDITIONS THAT APPLY TO READ ALSO APPLY TO READU; THOSE THAT APPLY TO GET 
ALSO APPLY TO _GETUP. i 
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Table A-1 STATUS CODE SETTINGS (a-c) 


STATUS LIOCS MAIN . 
CODE SUBROUTINE CONDITION INDICATED 


(NONE ) 
_READ, WRITE 


_GET, BOF 
EOF, _INSRT, 
DLETE, READ, 
“WRITE 


_UPDTE, DLETE 
“WRTEF 


_WRTEF 


Any LIOCS-C 
Operation 


_OPEN 


(NOT USED) 

_READ or WRITE attempted to a non-indexed file. 

_READ or WRITE attempted on an output or work file. 

One of these operations was attempted in the extension portion of an 
extend file; they are permitted only in the original portion of the 
file. 

Or, one of these operations was attempted in a work or output file 
before a temporary end-of-file mark was written or after the tem- 
porary end-of-file mark was overwritten by a PUT. 


Current sector address is null. One of these operations was attemp- 
ted immediately after a DLETE, BOF, WRTEF, or OPEN. 


The operation was attempted on an extend file. It is prohibited. 


Or an attempt was made to shorten an output file which already had 
an existing temporary end-of-file mark. 


An operation other than OPEN attempted on an unopened file. 

A disc error has occurred ‘in processing a directory entry or allo- 
cating pool free sectors. 

CONO unit display will be: 

S)OPEN pppppp. ffffff:DISC 1/0 ERROR. 

The system was unable to locate a pool specified (in UFCB Field 2). 
CONO unit display will be: 

S)OPEN pppppp. ffffff:POOL NOT FOUND. 


The system was unable to locate the file specified (in UFCB Field 3) 
in the pool specified (in UFCB Field 2). 


CONO unit display will be: 
S)OPEN pppppp. ffffff:FILE NOT FOUND. 


The user's file type does not agree with the file type of the re- 
quested file. 


CONO unit display will be: 
D)OPEN pppppp. ffffff:INVALID USER FCB TYPE. 


The action flag field of the UFCB does not contain one of the five 
acceptable values (000,100,010,001 or WOO). 


CONO unit display will be: 
S)OPEN pppppp. ffffff: INVALID ACTION FLAGS. 


NOTE: THE CONTENTS OF THE STATUS CODE FIELD OF THE POFCB ARE NOT INDICATIVE OF ANY CONDITION 
UNLESS THE PROGRAM BEING EXECUTED BRANCHES TO AN ERROR ROUTINE SPECIFIED IN A LIOQCS MAIN 
SUBROUTINE CALLING SEQUENCE. 


NOTE: ERROR CONDITIONS THAT APPLY TO READ ALSO APPLY TO READU; THOSL THAT APPLY TO GET 
ALSO APPLY TO _GETUP. 7 
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LIOCS-C STATUS CODES 


Table A-1 STATUS CODE SETTINGS (H-N) 


STATUS LIOCS MAIN 
CODE SUBROUTINE CONDITION INDICATED 
aR mR Ia a IEE EBT ITE CSE A NTE TSN AIA EE EEO EES TE BE EAC DE 


NOTE: 


The user has attempted to open a null file (one containing no data 
records) as a read-only, fixed-allocation or extend file; these 
three categories must contain data records at OPEN time. 


CONO unit display will be: 

S)OPEN pppppp. ffffff: INVALID ACTION FOR NULL FILE. 

An attempt has been made to open a file containing data records as 
a work or output file; these two types of file must be null at open 
time. 

CONO unit display will be: 

S)OPEN pppppp. ffffff: INVALID ACTION FOR NON-NULL FILE. 


An attempt has been made to open an indexed file as an output or 
work file. 


CONO unit display will be: 
S)OPEN pppppp. ffffff: INVALID ACTION FOR INDEX FILE. 


UFCB Field 4 (Work Area Address) does not contain a valid partition 
address. User's Work Area must be in partition. 


CONO unit display will be: 

S)OPEN pppppp. ffffff: INVALID WORK AREA ADDRESS. 

UFCB Field 5 (Logical Record Size) does not contain a numeric value. 
(Note that a 0 size record is accepted but will default to the 
record size specified in the file label Field 9.) 

CONO unit display will be: 

S)OPEN pppppp. ffffff: INVALID RECORD SIZE. 

UFCB Field 6 (User EOF Routine Address) does not contain a valid 
System Ten partition address. User error routines must not be in 
common. 


CONO unit display will be: 
S)OPEN pppppp. ffffff: INVALID USER EOF ADDRESS. 


UFCB Field 11 (Key Argument Address) does not contain a valid parti- 
tion or common address. In the UFCB source coding, this field 
should contain either the label or the address where the key 
argument will be stored during program execution. 


CONO unit display will be: 
S)OPEN pppppp. ffffff: INVALID KEY ARG ADDRESS. 


THE CONTENTS OF THE STATUS CODE FIELD OF THE POFCB ARE NOT INDICATIVE OF ANY CONDITION 


UNLESS THE PROGRAM BEING EXECUTED BMNERED TO AN ERROR ROUTINE SPECIFIED IN A LIOCS MAIN 
SUBROUTINE CALLING SEQUENCE. 


NOTE: 
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ERROR CONDITIONS THAT APPLY TO READ ALSO APPLY TO READU; THOSE THAT APPLY TO _GET 
ALSO APPLY TO _GETUP. 
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LIOCS-C STATUS CODES 


Table A-1 STATUS CODE SETTINGS (0-2) 


STATUS LIOCS MAIN 
CODE SUBROUTINE CONDITION INDICATED 
(CSE pn ea AIT Sa PNP IE NE DICE aT | I IIE I PG SS 


(NOT USED) 
(NOT USED) 


UFCB Fields 9 and 10 (Secondary and Primary Allocation fields) do 
not contain $$$$, ////, or numeric values; or the fields are not in 
agreement. If contention is specified in either field, it must be 
specified in both. (//// = non-contention, numeric value = special 
allocation requested, and $$$$ = default allocation requested). 


CONO unit display will be: 
S)OPEN pppppp. ffffff: INVALID SECTOR ALLOCATION. 
(NOT USED) 


A primary allocation was requested but no pool free sectors were 
available. 


CONO unit display will be: 

S)OPEN pppppp. ffffff:NO POOL FREE SECTORS AVAILABLE 
(NOT USED) 

(NOT USED) 


Between the time this partition obtained the pointers to the prior 
and current sectors and initiated an INSRT, another partition has 
made an _INSRT into the file at the same place. This partition did 
not insert the record or alter the file. It's FCB has been set up 

so the next GET will obtain the record just inserted by the other 
partition. User Response: issue GET's until a key greater than 

the one to be inserted is encountered, then re-issue the _INSRT. 
Remember to GET into a different buffer or the record to be inserted 
will be overlayed. 


Any LIOCS-C A previous _READ or _WRITE encountered an error with a status code 

Operation of X and the user program failed to respond by branching to RETRY 
The partition is missing either a CONO or CONI device or both 
making communication with the operator impossible. User Response: 
Close all other files, abort the run, and check the integrity of 
the file in question. 


_READ, WRITE An attempt was made to access a disc drive that is not ready. The 
partition is missing either the CONO or CONI device or both, making 
displaying the normal error message and responding to it impossible. 
ONLY USER PROGRAM RESPONSE: Branch to RETRY in LIOCS-C with condi- 
tion code set. CC2=retry I/0 operation; any other condition code = 
the user's error exit will be taken with status code 1 set. 


A disc error was encountered during execution of the system program 
CLOSEC. The file has not been properly closed. 


CONO unit display will be: 
S)1/0 ERROR (nnnnnn):CLOSE NOT COMPLETED. 


(nnnnnn) specifies the physical disc address of the sector on which 
the error was encountered. 


A disc I/0 error was encountered during execution of the system 
Program CLOSEC. The file may be closed but unused sectors were not 
returned to the pool free sector list. 

CONO unit display will be: 

S)I/0 ERROR (nnnnnn):SECTORS LOST DURING CLOSE. 

(nnnnnn) specifies the physical disc address of the sector on which 
the error was encountered. 


NOTE: THE CONTENTS OF THE STATUS CODE FIELD OF THE POFCB ARE NOT INDICATIVE OF ANY CONDITION 
UNLESS THE PROGRAM BEING EXECUTED BRANCHES TO AN ERROR ROUTINE SPECIFIED IN A LIOCS MAIN 
SUBROUTINE CALLING SEQUENCE. 


NOTE: ERROR CONUITIONS THAT APPLY TO READ ALSO APPLY TO READU; THOSE THAT APPLY TO GET 
ALSO APPLY TO GETUP. - 7 
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Appendix B 
FCB MACRO PARAMETERS 


FCB MACRO PARAMETERS 


Table B-1 FCB MACRO PARAMETERS 


FCB MACRO FORMAT: LabelbFCBBNAME=p-name.f-name,USE=action, AREA=wkarea, 
EXIT=eofaddr , BLKL=bl klen,PASSW='password', 
KEYAD=keyaddr ,ALLOC=alspec,TYPE=fcbtype 


EXAMPLE: FCB NAME=PNAME.FNAME] ,USE=EXTEND ,AREA=WKAREA, EXIT=EOF ,BLKL=470,ALLOC=(0,10), 
TYPE=LS 


PARAMETER EXPLANATION DEFAULT 


Label Label for beginning of FCB --Optional Optional 

FCB Macro name Required 

NAME=p-name. f-name Names of pool and file to be accessed Required -- no 
default pool. 


USE=action Sets Action Flags. 
action specified file type Defaults to INPUT 


if not specified 
INPUT read-only file 
QUTPUT output file 
EXTEND extend file 
FIXED fixed-allocation file 
WORK work file 


AREA=wkarea wkarea is the address (an expression) of Required 
the User's Work Area 


EXIT=eofaddr eofaddr is the address (an expression) of Required 
the User's End-of-File Routine 


BLKL=bl klen Logical Block Length (an expression) Defaults to zero if not 
specified (Logical Block 
Length to be picked up 
from file label) 


PASSW= ' password ' File Access Password; password is 1-6 Defaults to blanks if 
characters enclosed in apostrophes not specified 


KEYAD=keyaddr keyaddr is the address of the Key Argument Required for Indexed 
Field (an expression). Linked Sequential Files 
(TYPE=ILS) 


ALLOC=alspec alspec is the Allocation Specification Defaults to YES if not 
specified. 
alspec: meaning: 


YES System default values (field 
set to '$$$$') 


_NQ No allocation-- Input or FIXED 
file (field set to '////') 


(primary, secondary) Explicit specification 
of primary and secondary allocation; both 
are expressions 


TYPE=fcbtype FCB type specification: | Required 


LS-- for Linked Sequential FCB (will 
generate a 94 character FCB) 


ILS-- for Indexed Linked Sequential FCB 
(will generate a 110 character 
FCB) 
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Drive Lock 


A LIOCS-C facility that minimizes disc seek time by locking a 
dise drive to a partition until it has completely read or 
written a record. The ten-entry Drive Lock Table begins in 
location 510 in common. 


Record Lock 


LIOCS-C functions _GETUP and _READU lock a record so it is 
protected from being accessed by GETUP or READU from another 
partition as long as it is locked. Any subsequent LIOCS-C 
operation from the same partition on the same _ FCB will 
automatically unlock the record. The ten-entry Record Protect 
Table begins in location 410 in common. 


System Lock 


The system lock makes sure only one partition at a time modifies 
the Pool Directory. 


Transfer Vector 


A transfer vector is a set of branch instructions ina fixed 
location which are used as entry points to routines whose 


locations may vary. 
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DMF COMMON—RESIDENT LIOCS (LIOCS-C) 
REFERENCE MANUAL 
Publication No. 40-340 


We produce manuals for you, and we want you to find them useful and informative. That’s our job. 
So we’re asking you to help us furnish you with the best possible publications. Please take a few minutes to 


answer the following questions. Add any comments you wish. If you desire a reply to any question, be sure to 
include your name and address. 


Thank you. 


e Does this manual meet your needs? Yes L] No L] 
If not, what additional information would be of help to you? 


e Can you find what you’re looking for quickly and easily? Yes co No LJ 
How can the organization be improved? 


e ls the material easy to read and to understand? Yes L_] No L_] 
Are there enough illustrations to support the text? Yes L] No LJ 
Comments 

e Did you find any errors or ambiguities in the manual? Yes L_] No LJ 


If yes, please cite page, line, and/or figure number with your comments. 


e Other comments. 


e What is your relationship to the product described? 
LJ Operator. 
LJ Programmer. 
[1 Other (please specify) 
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